clustNums =10
cols <- paste0("clust",c(1:clustNums))
## The functions in the rglwidget package have been moved to rgl.